Top 10k strings from Soft Spectrum - Issue 02 (1985)(Grupo de Trabajo Software)(es)(Side B).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
15 ;"pulse una tecla para continuar";
10 linr,colr;"
10 lina,cola;"
10 ;"S O F T S P E C T R U M **** 2":
10 ;"Revista en cassette"
5 ;"Programado por:";
5 ;"PULSE PLAY":
5 ;"PREPARADO PARA OTRO PROGRAMA":
5 ;" Suscribase a SOFTSPECTRUM por solo 1950 pts. y recibira 11 cassettes con sus correspon- dientes revistas, con un aho- rro de 1350 pts. "
5 ;" Si desea ver publicado alguno de sus programas en esta re- vista, para su difusion entre los usuarios del Spectrum, en- vielos en un cassette, adjun- tando instrucciones, a:"
5 ;" SOFTSPECTRUM c/ Marques de Ca- sa Riera, 4 28014-MADRID "
5 ;" ********** *PUBLIQUE* * SU * *PROGRAMA* **********"
5 ;" Si su programa resulta elegido en alguna de las selecciones mensuales, recibira 5000 ptas. por cada uno. No se devuelven los cassettes ni se mantiene correspondencia sobre los programas. ":
5 ;" Para ello copie o mande el cu- pon incluido en la revista a: SOFTSPECTRUM c/ Marques de Ca- sa Riera, 4 28014-MADRID ":
5 ;" Cada mes seran elegidos varios programas de entre todos los recibidos;los que no se publi- quen, pasaran a la seleccion del mes siguiente."
5 ;" SUSCRIBASE TELEFONICAMENTE -------------------------- Si desea suscribirse telefoni- camente, llame al 222 47 81 de Madrid (prefijo 91). Esta linea esta provista de un contestador automatico, por lo que puede suscribirse las 24 horas del dia,festivos inclui- dos."
5 ;" OFERTA DE SUSCRIPCION --------------------- "
5 ;" ****** ":
4 ;" "
4
3 ;" ":
2 linr,colr+1
2 lina,cola+1
2 UTILIZA SOLO ""1"", ""X"" O ""2""
2 A$(FILA,COL)="T"
2 ;" "
1 vidr=vidr-1
1 vida=vida-1
1 score>2000
1 score>1000
1 score=score+100
1 puntr=puntr+10
1 punta=punta+10
1 linr=linr-1
1 linr=linr+1
1 linr,colr-1
1 lina=lina-1
1 lina=lina+1
1 lina,cola-1
1 h$="DESCONECTADA":
1 h$="DESCONECTADA"
1 colr=colr-1
1 colr=colr+1
1 cola=cola-1
1 cola=cola+1
1 c=a-b*65536
1 c$="ABCDEFGHIJKLMNO "
1 b=t-h*3600
1 a$="OEMKLJCGAHFDNIB "
1 a$=" H=PARAR S=COMIENZO ":
1 a$=" 5<- ->8 ":
1 a$=" UN MOMENTO POR FAVOR ":
1 a$=" PULSE S ":
1 a$=" FRONTON ":
1 Y COLOCAR BARCOS
1 TOMA DE DATOS
1 TIENES ";A;" ACIERTOS EN COLUMNA ";CO
1 TANQUE
1 SUBMARINO DESTRUCTOR ACORAZADO PORTAAVIONES
1 SONIDO TOCADO
1 SONIDO HUNDIDO
1 SONIDO AGUA
1 SOFT SPECTRUM N.2
1 RELOJ/DESPC
1 QUINIELAS
1 PUZZLE-15
1 PUN=PUN-100
1 PUN=PUN+300
1 PUN=PUN+150
1 PULSE UNA TECLA PARA CONTINUAR
1 PULSA PARA SEGUIR
1 PRESENTACION GRAFICA
1 POSICION VERTICAL PORTAAVIONES
1 POSICION HORIZONTAL PORTAAVIONES
1 POSICION DE LOS BARCOS
1 PASAMOS A OTRO BOLETO? (PULSA)
1 OEMKLJCGAHFDNIB l
1 O$=" "
1 O$=" ":
1 NUEVO INTENTO
1 MOVIMIENTO
1 M-5235-19850
1 JORNADA Y BOLETOS
1 INSTRUCCIONES
1 I$=I$+"TODOS LOS PARTIDOS LOS PUEDE JUGAR A ""FIJO"", ""DOBLE"" O ""TRIPLE"". UNA VEZ APAREZCA EL BOLETO EN LAPANTALLA, DEBERA COPIARLO EN ELDEL PATRONATO. EL SISTEMA DE COMPROBACION ES ""AUTOMATICO"". "
1 I$="ESTE ES UN PROGRAMA PARA LA CON-FECCION DE QUINIELAS CON UN SIS-TEMA DE COMBINACION TOTALMENTE ALEATORIO. PRIMERO INTRODUCE EL NUMERO DE JORNADA, Y DESPUES CUANTOS BOLE-TOS QUIERES JUGAR (CADA BOLETO SON ""8""COLUMNAS)."
1 FRONTON
1 FHY=Y+(LON-1
1 FHX=X+(LON-1
1 F,G;A$(F,G)
1 F$=A$(FILA,COL)
1 EDITORIAL GRUPO VEINTIUNO
1 DIBUJO BOLETO
1 DEMASIADO LARGO
1 CREACION GRAFICOS
1 COMPROBAR TIROS
1 COMPROBAR POSICION VERTICAL BARCOS
1 COMPROBACION DE SIGNO
1 CARACTERES GRAFICOS
1 C0MPROBACION
1 BUENA SUERTE!!!
1 BUENA SUERTE
1 BARQUITOS
1 ALIENS
1 ABCDEFGHIJKLMNO a
1 ABCDEFGHIJKLMNO C
1 AAA A A PPPP A
1 A$(Y,F)="P":
1 A$(Y,A)=("A"
1 A$(F,X)="P":
1 A$(A,X)=("A"
1 ;A$(FILA,COL)
1 ;("TOCADO "
1 ;"vidas :";vidr:
1 ;"vidas :";vida:
1 ;"tanque rojo :";
1 ;"tanque azul :";
1 ;"s=izquierda";
1 ;"s.shift +k=dis."
1 ;"s.shift +j=dis."
1 ;"q=arriba";
1 ;"puntos :";puntr;
1 ;"puntos :";punta;
1 ;"p=arriba"
1 ;"l=abajo"
1 ;"k=derecha"
1 ;"j=izquierda"
1 ;"d=derecha";
1 ;"c.shift +s=dis.";
1 ;"c.shift +d=dis.";
1 ;"a=abajo";
1 ;"VAMOS A COMPROBAR LAS APUESTAS"
1 ;"Usted debe impedir que los a- lienigenas aterricen en la po- sicion planetaria que esta de- fendiendo."
1 ;"TIRADAS":
1 ;"TANQUE ROJO";
1 ;"TANQUE AZUL"
1 ;"Su mision consiste en ordenar- las alfabeticamente.Las letras se mueven ocupando la celdilla vacia, empleando las teclas 5, 6, 7 y 8."
1 ;"SI NO ES ASI, INTENTALO OTRA VEZ LA PROXIMA SEMANA"
1 ;"ROUND ";r;
1 ;"REPETIDO":
1 ;"QUIERE REPETIR ? (S/N)":
1 ;"QUIERE INSTRUCCIONES? (S/N)"
1 ;"PUNTOS= ";score
1 ;"PUNTOS":
1 ;"PUNTOS ";p:
1 ;"PULSE UNA TECLA"
1 ;"PULSA UNA TECLA":
1 ;"PULSA EL NUMERO DE LA OPCION"
1 ;"POSICION DE LOS BARCOS"
1 ;"PARA EL CASSETTE":
1 ;"P O R F A V O R"
1 ;"Mueva el visor utilizando las teclas del cursor (5,6,7 y 8). Una vez que los enemigos hayan conseguido aterrizar diez ve- ces, terminara la partida."
1 ;"M O M E N T O";
1 ;"LUIS TORRENTS NADAL";
1 ;"LLUIS DOMENECH I ARNAL";
1 ;"JUAN DAMIAN JORGE GUTIERREZ";
1 ;"JORNADA NUM. ";JO;
1 ;"INSTRUCCIONES"
1 ;"HA GANADO EL ROJO"
1 ;"HA GANADO EL AZUL"
1 ;"GRABAMOS EL BOLETO?(S/N)"
1 ;"FILA (0-9)? ";
1 ;"En la pantalla aparece un cua- drado compuesto por 16 celdi- llas, en las que se encuentran desordenadamente las 15 prime- ras letras del abecedario. "
1 ;"ESTHER SANCHEZ MUNOZ";
1 ;"E S P E R E";
1 ;"DESEA JUGAR OTRA PARTIDA (S/N)":
1 ;"DESEA INTENTARLO DE NUEVO? (S/N)"
1 ;"CORRECTO";
1 ;"CONCEPCION ASENJO";
1 ;"COLUMNA (A-J) ? ";
1 ;"COLUMNA ";CO:
1 ;"CARGAMOS OTRO BOLETO...
1 ;"BOLETO "
1 ;"BARCOS":
1 ;"ALARMA: ";
1 ;"ACIERTOS ";A:
1 ;"1.- CONFECCION QUINIELA 2.- COMPROBACION"
1 ;"----------------
1 ;"*MENU* ======"
1 ;"###PUZZLE-15###";
1 ;"!!!AGUA!!!":
1 ;" MEJOR PUNTUACION:";
1 ;" INSTRUCCIONES ------------- "
1 ;" U N ";
1 ;" ESPERO QUE TENGAS
1 ;" PON EN MARCHA EL CASSETTE "
1 ;" ESTE ERA TU ULTIMO BOLETO..."
1 ;" DATA ERROR ":
1 ;" FINAL DE LA COMPROBACION ":
1 ;" ":
1 ;" ELIJA SUS COLORES ";
1 ;" ":
1 ;" ":
1 ;" ":
1 ;" ":
1 28-AGOSTO-84
1 )=(" "+
1 )+("HUNDIDO "
1 (linr,ir)=51
1 (linr,ir)=49
1 (linr,dr)=51
1 (linr,dr)=49
1 (linr,colr-1
1 (linr,colr+1
1 (lina,ia)=51
1 (lina,ia)=50
1 (lina,da)=51
1 (lina,da)=49
1 (lina,cola-1
1 (lina,cola+1
1 "SUBMARINO","DESTRUCTOR","ACORAZADO","PORTAAVIONES"
1 "Quiere despertador o solo reloj? (d/r)";d$
1 "PARTIDO";P$
1 "Otra partida ? (s/n)",a$
1 "NUMERO DE JORNADA? ";JO
1 "NUM.BOLETOS A COMPROBAR ";BC
1 "Minuto?";m
1 "INTRODUCE LOS SIGNOS ";S$;W$:
1 "INTRODUCE EL SIGNO ";S$:
1 "INTRODUCE EL RESULTADO ";R$
1 "Entre la hora exacta de alarma,horas,minutos y segundos.-Ejemplo=""06:12:00""",h$
1 "CUANTOS BOLETOS QUIERE JUGAR?";BO
1 "Border ";a,"Ink ";b
1 "APUESTA (""F"",""D"",""T"") ";R$
1 ""F""(FIJO)""D""(DOBLE)""T""(TRIPLE)
1 PROGRAMA PRINCIPAL
1 LUIS TORRENTS NADAL (1984)*
1 ESTHER SANCHEZ MU
1 COMPROBAR POSICION
1 COLOCANDO BARCOS
1 ' PARA SALIR":
1 HORIZONTAL
1 PULSA PARA TERMINAR
1 PULSE S
1 EN LA JORNADA NUM. ";JO
1
1
1
1
1
1